#include <stdio.h>
#include "linklist.h"
#include <stdlib.h>

//创建
Linklist *list_create()
{
	Linklist *L=(Linklist*)malloc(sizeof(Linklist));
	if(NULL==L)
	{
		printf("创建失败\n");
		return NULL;
	}
	//初始化
	L->len=0;
	L->next=NULL;
	printf("创建成功\n");
	return L;
}

//判空
int list_empty(Linklist *L)
{

	//1表示空，0表示非空
	return NULL==L->next?1:0;
}

//头插
int list_insert_head(Linklist *L,datatype e)
{
	//判断条件
	if(NULL==L)
	{
		printf("所给链表不合法\n");
		return -1;
	}

	//申请节点
	Linklist *p=(Linklist *)malloc(sizeof(Linklist));
	if(NULL==p)
	{
		printf("节点申请失败\n");
		return -1;
	}
	
	//将要插入的数据放入节点
	p->data=e;
	p->next=NULL;

	//完成头插
	p->next=L->next;
	L->next=p;

	//表的变化
	L->len++;

	printf("头插成功\n");
}


//遍历
void list_show(Linklist *L)
{
	//判断逻辑
	if(NULL==L||list_empty(L))
	{
		printf("表空，遍历失败\n");
		return;
	}
	//遍历逻辑
	printf("链表元素分别是：");
	Linklist *q = L->next;
	while(q!=NULL)
	{
		printf("%c\t",q->data);
		q=q->next;
	}
	printf("\n");
}
//定义申请节点函数
Linklist *node_buy(datatype e)
{
	Linklist *p=(Linklist*)malloc(sizeof(Linklist));
	if(NULL==p)
	{
		printf("节点申请失败\n");
		return NULL;
	}

	//将数据存到节点中
	p->data=e;
	p->next=NULL;
	return p;
}

//尾插
int list_insert_tail(Linklist *L,datatype e)
{
	//判断逻辑
	if(NULL==L)
	{
		printf("所给链表不合法\n");
		return -1;
	}
	//申请节点
	Linklist *p=node_buy(e);
	//遍历指针指向最后一个节点
	Linklist *s=L;
	while(s->next!=NULL)
	{
		s=s->next;
	}
	//尾插逻辑
	s->next=p;
	//表的变化
	L->len++;
	return 0;
}

//按位置查找返回查找到的结点
Linklist *find_node(Linklist *L,int pos)
{
	//判断逻辑
	if(NULL==L||pos<0||pos>L->len)
	{
		printf("查找失败\n");
		return NULL;
	}

	//查找结点
	Linklist *q=L;
	for(int i=1;i<=pos;i++)
	{
		q=q->next;
	}
	return q;
}

//任意插
int list_insert_pos(Linklist *L,int pos,datatype e)
{
	//判断逻辑
	if(NULL==L||pos<1||pos>L->len+1)
	{
		printf("插入失败\n");
		return -1;
	}
	//申请结点存放数据
	Linklist *p =node_buy(e);


	//查找要插入位置的前驱结点
	Linklist *q=find_node(L,pos-1);

	//插入逻辑
	p->next=q->next;
	q->next=p;

	//表的变化
	L->len++;
	printf("插入成功\n");
	return 0;
}

//头删
int list_delete_head(Linklist *L)
{
	//判断逻辑
	if(NULL==L||list_empty(L))
	{
		printf("删除失败\n");
		return -1;
	}

	//头删
	Linklist *p=L->next;
	L->next=p->next;
	free(p);
	p=NULL;

	//表的变化
	L->len--;
	printf("头删成功\n");

	return 0;

}

//尾删
int list_delete_tail(Linklist *L)
{
	if(NULL==L||list_empty(L))
	{
		printf("删除失败\n");
		return -1;
	}
	Linklist *p=find_node(L,L->len-1);
	free(p->next);
	p->next=NULL;
	L->len--;
	printf("删除成功\n");
	return 0;
}

//任意删
int list_delete_pos(Linklist *L,int pos)
{
	//判断逻辑
	if(NULL==L||pos<1||pos>L->len)
	{
		printf("删除失败\n");
		return -1;
	}

	//找到要删除位置的前驱
	Linklist *q=find_node(L,pos-1);
	//删除逻辑
	Linklist *p=q->next;
	q->next=p->next;
	free(p);
	p=NULL;

	//表的变化
	L->len--;

	printf("删除成功\n");
	return 0;
}


//按值查找返回第一个查找成功的位置
int list_search_value(Linklist *L,datatype e)
{
	//判断逻辑
	if(NULL==L||list_empty(L))
	{
		//printf("查找失败\n");
		return -1;
	}

	//查找逻辑
	Linklist *q=L->next;
	for(int i=1;i<=L->len;i++)
	{
		if(q->data==e)
		{
			return i;
		}
		q=q->next;
	}
	return 0;
}

void list_free(Linklist *L)
{
	if(NULL==L)
	{
		return;
	}
	//不断调用头删，将结点进行删除
	while(L->next!=NULL)
	{
		list_delete_head(L);
	}

	//将头结点释放
	free(L);
	L=NULL;
	printf("释放表成功\n");
	return;
}


//按位置修改
int list_updata_pos(Linklist *L,int pos,datatype e)
{
	if(NULL==L)
	{
		printf("修改失败\n");
		return -2;
	}
	if(pos<1||pos>L->len)
	{
		printf("位置不合法\n");
		return -1;
	}
	Linklist *p=find_node(L,pos);
	p->data=e;
	printf("修改成功\n");
	return 0;
}

//按值修改
int list_updata_value(Linklist *L,datatype old_e,datatype new_e)
{
	if(NULL==L)
	{
		printf("修改失败\n");
		return -2;
	}
	Linklist *q=L->next;
	while(q!=NULL)
	{
		if(q->data==old_e)
		{
			break;
		}
		q=q->next;
	}
	if(q==NULL)
	{
		printf("未找到对应元素，修改失败\n");
		return -1;
	}
	else
	{
		q->data=new_e;
		printf("修改成功\n");
		return 0;
	}
}

//原地逆置
void list_reverse(Linklist *L)
{
	Linklist *p=L->next;
	Linklist *q=p;
	L->next=NULL;
	while(p!=NULL)
	{
		p=p->next;
		q->next=L->next;
		L->next=q;
		q=p;
	}
	printf("逆置成功\n");
}

